home *** CD-ROM | disk | FTP | other *** search
/ Light ROM 1 / LIGHT-ROM 1 (Amiga Library Services)(1994).iso / ffdisks / d880.lha / Oberon / O3Demo2.lzh / Definitions / io.def < prev    next >
Text File  |  1993-01-15  |  836b  |  33 lines

  1. DEFINITION io;
  2.  
  3. IMPORT
  4.   d := Dos,
  5.   e := Exec;
  6.  
  7. VAR
  8.   out, in : d.FileHandlePtr;
  9.   Me : d.ProcessPtr;
  10.   closeDelay : LONGINT;
  11.  
  12. PROCEDURE Write(ch: CHAR);
  13. PROCEDURE WriteLn;
  14. PROCEDURE WriteString(string: ARRAY OF CHAR);
  15. PROCEDURE Tab(n: INTEGER);
  16. PROCEDURE Clear();
  17. PROCEDURE Format(str: ARRAY OF CHAR; data: e.APTR);
  18. PROCEDURE WriteInt(x: LONGINT; n: INTEGER);
  19. PROCEDURE WriteHex(x: LONGINT; n: INTEGER);
  20. PROCEDURE Read(VAR ch: CHAR);
  21. PROCEDURE ReadString(VAR str: ARRAY OF CHAR);
  22. PROCEDURE ReadInt(VAR x: LONGINT): BOOLEAN;
  23. PROCEDURE ReadInteger(VAR x: INTEGER): BOOLEAN;
  24. PROCEDURE ReadShortInt(VAR x: SHORTINT): BOOLEAN;
  25. PROCEDURE ReadHex(VAR x: LONGINT): BOOLEAN;
  26. PROCEDURE ReadIntOk(VAR x: LONGINT);
  27. PROCEDURE ReadIntegerOk(VAR x: INTEGER);
  28. PROCEDURE ReadShortIntOk(VAR x: SHORTINT);
  29. PROCEDURE ReadHexOk(VAR x: LONGINT);
  30.  
  31. END io.
  32.  
  33.